Top 10k strings from Superplan Generator (1982)(Video Software).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /

Back to the directory listing

   6 (pp/du)+10
   5 pr=pr+wid:
   5  Date       #           
   3 salesday    24.01.83
   3 c$(cc,un):
   3  NAME               
   3    Exempt   @           
   3    @ zero   @           
   3     @ XX%   @           
   3     @ 15%   @           
   3      VAT    @           
   2 y$=y$+y$+y$:
   2 v(mark)=ptr:
   2 shortdem    1       
   2 ptr=twf*32
   2 ptr=ptr+attr:
   2 ptr=bwf*32
   2 pr=pr-wid:
   2 l$=c$(c,17
   2 l$(un)*byt+
   2 chr=attr+rl*32
   2 chr=attr+n*32
   2 c$(cc,un))>rwf
   2 arc=cc-un:
   2 )=c$(occ,qu):
   2 )=c$(cc,qu):
   2 (f$(un)="@"
   2 ((rt<ze)+(255
   2 "OK? (y/n) ";l$:
   2 ";n;"   ":
   2  Postage    @           
   2  Inv.No     @           
   2  Bal.Total  @           
   2   Stnry     @           
   2   SP                    
   2   Petrol    @           
   2   Office    @           
   2   NL Cheques@           
   2     Total   @           
   2      CHECK  &^d-e:i+    
   2       Line 99 
   2       Line 98 
   2       Line 97 
   2       Line 96 
   2       Line 95 
   2       Line 94 
   2       Line 93 
   2       Line 92 
   2       Line 91 
   2       Line 90 
   2       Line 9  
   2       Line 89 
   2       Line 88 
   2       Line 87 
   2       Line 86 
   2       Line 85 
   2       Line 84 
   2       Line 83 
   2       Line 82 
   2       Line 81 
   2       Line 80 
   2       Line 8  
   2       Line 79 
   2       Line 78 
   2       Line 77 
   2       Line 76 
   2       Line 75 
   2       Line 74 
   2       Line 73 
   2       Line 72 
   2       Line 71 
   2       Line 70 
   2       Line 7  
   2       Line 69 
   2       Line 68 
   2       Line 67 
   2       Line 66 
   2       Line 65 
   2       Line 64 
   2       Line 63 
   2       Line 62 
   2       Line 61 
   2       Line 60 
   2       Line 6  
   2       Line 59 
   2       Line 58 
   2       Line 57 
   2       Line 56 
   2       Line 55 
   2       Line 54 
   2       Line 53 
   2       Line 52 
   2       Line 51 
   2       Line 50 
   2       Line 5  
   2       Line 49 
   2       Line 48 
   2       Line 47 
   2       Line 46 
   2       Line 45 
   2       Line 44 
   2       Line 43 
   2       Line 42 
   2       Line 41 
   2       Line 40 
   2       Line 4  
   2       Line 39 
   2       Line 38 
   2       Line 37 
   2       Line 36 
   2       Line 35 
   2       Line 34 
   2       Line 33 
   2       Line 32 
   2       Line 31 
   2       Line 30 
   2       Line 3  
   2       Line 29 
   2       Line 28 
   2       Line 27 
   2       Line 26 
   2       Line 25 
   2       Line 24 
   2       Line 23 
   2       Line 22 
   2       Line 21 
   2       Line 20 
   2       Line 2  
   2       Line 19 
   2       Line 18 
   2       Line 17 
   2       Line 16 
   2       Line 153
   2       Line 152
   2       Line 151
   2       Line 150
   2       Line 15 
   2       Line 149
   2       Line 148
   2       Line 147
   2       Line 146
   2       Line 145
   2       Line 144
   2       Line 143
   2       Line 142
   2       Line 141
   2       Line 140
   2       Line 14 
   2       Line 139
   2       Line 138
   2       Line 137
   2       Line 136
   2       Line 135
   2       Line 134
   2       Line 133
   2       Line 132
   2       Line 131
   2       Line 130
   2       Line 13 
   2       Line 129
   2       Line 128
   2       Line 127
   2       Line 126
   2       Line 125
   2       Line 124
   2       Line 123
   2       Line 122
   2       Line 121
   2       Line 120
   2       Line 12 
   2       Line 119
   2       Line 118
   2       Line 117
   2       Line 116
   2       Line 115
   2       Line 114
   2       Line 113
   2       Line 112
   2       Line 111
   2       Line 110
   2       Line 11 
   2       Line 109
   2       Line 108
   2       Line 107
   2       Line 106
   2       Line 105
   2       Line 104
   2       Line 103
   2       Line 102
   2       Line 101
   2       Line 100
   2       Line 10 
   2                                                                                                                                
   1 ze+a$+s$(un
   1 z$(tr)=m$(byte):
   1 z$(qu)*256
   1 z$(du)=o$(bit):
   1 x$=l$+p$+x$:
   1 wid<dz)))+s$(un
   1 w$(occ-un)+
   1 w$(occ-un)
   1 w$(m-un)+dig-un)=u$(se-dig
   1 w$(cc-un)+dig-un)=z$(15
   1 w$(cc-un)+dig-un)=l$(se-dig
   1 up>ze),lwf;(l$
   1 up>ze)+((abl-un)
   1 up=(key=55
   1 up=(key=11
   1 up=(k$="7")-(k$="6"):
   1 up=(k$="7"
   1 up<ze)+(h$(abl,un
   1 up<ze)+(bwf
   1 un)+(h$(((cl+(cl=ze)
   1 u$=l$(tr)+l$(tr
   1 twf=twf-up:
   1 twf<bwf-du)
   1 twf,lwf;"TITLE   "
   1 twf+n,lwf;h$(n,un
   1 task+(l*10
   1 t$=" "+t$(un
   1 stockdemoN
   1 sproc     
   1 si;cl;"   ":
   1 scroll=64512
   1 salesdayH 5H
   1 salesdayC %
   1 s$="                                "
   1 rwf>lwf+dz)
   1 rwf=rwf+rt:
   1 rwf-pr+un):
   1 rwf-pr+un)
   1 rt=(key=56
   1 rt=(k$="8"
   1 rt=(k$="5")-(k$="8"):
   1 rt<ze)+(wid
   1 rt<ze)+(arc
   1 rt<ze)+((pr+wid-(scr
   1 rl>(twf+un))
   1 rl=twf)+(f$
   1 rl=bwf-un:
   1 rl=bwf))=l$:
   1 rl=bwf)),un
   1 rl<bwf-un)
   1 rl<bwf)+(ll
   1 qu+wid+(12
   1 purchdayH 5H
   1 purchdayC %
   1 prog=63488
   1 pr=pr+(adj
   1 pettcashH 5H
   1 pettcashC %
   1 pcc=cc+rt:
   1 pack1     F
   1 p$=x$(se):
   1 op1=op2*(op1/100
   1 op1=op1*op2
   1 on;"Today's date (8chs):";
   1 on;"START TAPE."
   1 on;"START TAPE, type 
   1 on;"SAVING A BATCH, type 
   1 on;"New title:";l$:
   1 on;"Enter value:";l$:
   1 on;"CALC":
   1 occ=cc+rt:
   1 oc)=c$(occ,30
   1 npr=pr+wid+adj-un:
   1 npr-scr>rwf):
   1 npr-scr>rwf
   1 n+un,oc;"      ";u$:
   1 n$=e$+s$(un
   1 multi=65216
   1 mark=mark+un:
   1 m$(byte)=z$(tr):
   1 lwf=lwf+rt:
   1 lwf=lwf+(key=56
   1 lwf+dz<rwf)
   1 l$=h$(atl,un
   1 l$=c$(un,27
   1 l$=c$(col+un):
   1 l$=c$(cc+rt,17
   1 l$=c$(cc):
   1 l$=a$(un,un
   1 l$="TITLE   ":
   1 l$(tr)*byt+
   1 l$(qu)*byt+
   1 l$(i)=".")
   1 l$(du)+un:
   1 kon       A
   1 k$=l$(oc):
   1 k$="k")+("="
   1 k$="j")+("+"
   1 hno=hno+un:
   1 h$(n,un)="*"
   1 h$(cl,un)="*":
   1 h$(cl,un)="*"
   1 f$=c$(cc,17
   1 f$(un)="@"
   1 f$(un)="&")
   1 f$(un)="#"
   1 f$(un)=" ")
   1 e$;"  ";d$;"  Batch: ";bno:
   1 e$(cc)+t$(du
   1 du;"First part loaded":
   1 ct+dig-un)=z$(9
   1 ct+dig-un)=u$(se-dig
   1 cl>un)-(k$="6"
   1 cl=cl+(byt
   1 cl=atl+rl-twf:
   1 cl=atl+c-twf:
   1 cl=((atl+un)
   1 chr=chr+un:
   1 cc=un),un)*rt
   1 cc=cc-(128
   1 cc=arc+un:
   1 cc=alc-(rt<ze):
   1 cc<col)-(k$="5"
   1 cashbookH 5H
   1 cashbookC 
   1 cashbook    24.01.83
   1 c$(twf-un,twf,lwf,rwf)
   1 c$(twf-un,bwf,lwf,rwf):
   1 c$(twf-un,bwf,lwf,lwf+se):
   1 c$(twf,bwf-un,lwf,rwf)
   1 c$(cc,qu):
   1 c$(cc,fi+(12
   1 c$(cc+rt+(rt<ze
   1 c$(arc,un)+wid:
   1 c$(arc,un))
   1 c$(alc-(rt<ze),un):
   1 byt))+u$(du
   1 bwf>twf+du)
   1 bwf=bwf-up:
   1 bot,lwf;"^":
   1 bot,lwf;" ":
   1 bno=bno+un
   1 blk=rwf-pr+un:
   1 bit=cc-(byte*oc-oc):
   1 bcd       
   1 attr=22528
   1 atl=atl-up:
   1 atl=atl+up:
   1 atl=atl+twf-otwf
   1 arc=arc-(rt<ze
   1 arc=arc+un:
   1 arc=arc+rt:
   1 arc=arc+rt+(rt<ze
   1 arc+rt>col
   1 alc=alc+rt-(npr
   1 alc=alc+rt
   1 alc)-(rt>ze
   1 abl=bwf-twf
   1 abl=atl+bwf-twf
   1 abl=abl-up:
   1 abl=abl+up
   1 a$(un,tr)=
   1 a$(un,tr):
   1 a$(m,dig):
   1 a$(hno)=l$:
   1 UNLOADING AUDIT TRAIL
   1 TOTALLING COLUMNS
   1 Starting points
   1 SUPERPLAN Processor
   1 SUPERPLAN PROCESSOR MENU
   1 SUPERPLAN PROCESSOR
   1 SAVING CHART 
   1 RESET CHART TO SPECIFIC VALUES
   1 PREPARATION
   1 PERFORM CALCULATIONS
   1 Make-ready
   1 LOADING A CHART
   1 Is that correct? (y/n) 
   1 First line: 
   1 First col :
   1 Final line: 
   1 Final col : 
   1 Created with Ramsoft MakeTZX
   1 Chart will be reset to: 
   1 CHART LOADED
   1 CHANGING GLOBAL CONSTANTS
   1 Business planning chart
   1 BREAK RETURN ENTER
   1 -((dz-wid)
   1 ,ze;"Type ~x~ to escape":
   1 ,ze;"New value, constant no. ";
   1 ,ze;"Line: ";n;"  Col: ";c;"  "
   1 ,ze;"Line: ";n:
   1 ,,"REWIND TAPE - PRESS PLAY","On error type BREAK RETURN ENTER" 
   1 ,,"Put cassette in recorder."
   1 ,,"LOAD CASSETTE, PRESS PLAY ","On error type BREAK RETURN ENTER",,,
   1 ,,"First part saved":
   1 +wid-(pl=ze)):
   1 )=c$(cc,30
   1 )-un)=z$(15
   1 (wid-(wid>12
   1 (up>ze))+(up<ze)):
   1 (rwf-lwf+un):
   1 (orwf-olwf+un):
   1 (op1+(op1=ze))
   1 (n<se);n-1
   1 (du^(oc-n)):
   1 (col/oc)+un:
   1 (bno/byt):
   1 (bno-(hno*byt)):
   1 ((cc-un)/oc)+un:
   1 "Your selection (1/2..../9):";l$
   1 "Verify? (y/n)";l$:
   1 "Today's date: ";d$:
   1 "Second part saved":
   1 "STOP TAPE, type 
   1 "STOP TAPE type 
   1 "Reset value:";l$:
   1 "Put audit trail cassette in yourrecorder. Connect for playback."
   1 "PRINT A COPY (y/n)";l$:
   1 "PLEASE WAIT"
   1 "On error type 
   1 "New value";u$:
   1 "New name:";n$:
   1 "Name of new chart:";e$
   1 "First line eg ~1~: ";l$:
   1 "First column eg ~b~: ";l$:
   1 "Final line eg ~99~: ";l$:
   1 "Final column eg ~Z~: ";l$:
   1 "Every line? (y/n) ";l$:
   1 "Every column? (y/n) ";l$:
   1 "Correct?(y/n)";l$:
   1 "Correct (y/n)";l$:
   1 ";xl;"  ":
   1 " 9. Perform calculations."
   1 " 8. Defer Calculations."
   1 " 7. Total chart."
   1 " 6. Unload audit trail."
   1 " 5. Save chart on cassette."
   1 " 4. Set global constants."
   1 " 3. View/print/update chart."
   1 " 2. Reset chart."
   1 " 1. Load chart from cassette."
   1  to be loaded.
   1  Travel     @           
   1  Tax/ins    @           
   1  TITLE              
   1  Service    @           
   1  Sales/M    @           
   1  Repairs    @           
   1  Rent etc   @           
   1  PHILIP SMITH 1982
   1  PCV No     @           
   1  Heat/lt    @           
   1  Equ.hire   @           
   1  Ent'mnt    @           
   1  Due out    &de-        
   1  Discount   @           
   1  Delivrd    @           
   1  DR Value   @           
   1  DR Ref.No  @           
   1  Cust-ords  @           
   1  Code no            
   1  CashPaidOut@           
   1  Car.hire   @           
   1  Capital    @           
   1  CR Value   @           
   1  CR Ref.No  @           
   1   Sp                    
   1   SL Total  &ef+        
   1   SL Cheques@           
   1   Pur-ords  @           
   1   Phone     @           
   1   Other     @           
   1   M/order   @           
   1   Group 5   @           
   1   Group 4   @           
   1   Group 3   @           
   1   Group 2   @           
   1   Group 1   @           
   1   Due in    &bc-        
   1   Discount  @           
   1   Car HP    @           
   1   BL Total  &no+        
   1   BL Cheques@           
   1    W/sale   @           
   1    Takings  @           
   1    Stock    &ce-        
   1    Retail   @           
   1    Rec'd    @           
   1    Misc     @           
   1    Hotel    @           
   1    Export   @           
   1    Capital  @           
   1     Other   @           
   1     Misc    @           
   1     Free    &if+j-      
   1      Value  &fg*        
   1      Price  #           
   1      CHECK  &^r-mnq+    
   1      CHECK  &^i-deh+    
   1      CHECK  &^e-l:wj+   
   1      CHECK  &^e-f:j+    
   1      CHECK  &^d-q:ui+   
   1      CHECK  &^d-k:oi+   
   1      CHECK  &^d-j:wi+   
   1      0.00      
   1                                 G
   1                                                                       L 
   1                                                                                                                                                                                                                                                                                                                                         T
   1                                                                                                                          
   1                                                                                                               
   1